home *** CD-ROM | disk | FTP | other *** search
/ Aminet 5 / Aminet 5 - March 1995.iso / Aminet / misc / amag / AM9410_2.lha / Tips & Tricks / Shell < prev    next >
AmigaDOS Script File  |  1994-08-31  |  1KB  |  47 lines
  1. .key STARTUP,STACK/K,DEFDIR/K,SHELL/K
  2. .bra [
  3. .ket ]
  4. ;
  5. ; Skript zum Starten von Shells. Als Parameter wird
  6. ; ein Start-Skript akzeptiert, das nach dem normalen
  7. ; Shell-Startup ausgeführt wird.
  8. ;
  9. ; Als CON-Window-Angabe wird die ENV-Variable CONDIM
  10. ; ausgewertet, die zum Beispiel folgenden Inhalt haben
  11. ; könnte:
  12. ;               KCON:20/170/600/230
  13. ;
  14. if NOT "[STARTUP]" EQ ""
  15.    if exists "[STARTUP]"
  16.       join S:Shell-Startup "[STARTUP]" as t:[$$]Startup.script
  17.    else
  18.       copy S:Shell-Startup to t:[$$]Startup.script
  19.    endif
  20. else
  21.    copy S:Shell-Startup to t:[$$]Startup.script
  22. endif
  23.  
  24. if "[STACK]" NOT EQ ""
  25.    echo >>T:[$$]Startup.script "STACK [STACK]"
  26. endif
  27. if "[DEFDIR]" NOT EQ ""
  28.    echo >>T:[$$]Startup.script "CD [DEFDIR]"
  29. endif
  30.  
  31.  
  32. if "[SHELL]" NOT EQ ""
  33.    "[SHELL]" $CONDIM/Shell/AUTO/CLOSE FROM t:[$$]Startup.script
  34. else
  35.    newshell $CONDIM/Shell/AUTO/CLOSE FROM t:[$$]Startup.script
  36. endif
  37.  
  38. ; Temporäre Datei löschen
  39. lab loeschmich
  40.  
  41.    wait 2 sec
  42.    delete >NIL: t:[$$]Startup.script
  43.    if warn
  44.       skip back loeschmich
  45.    endif
  46.  
  47.